home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 25 / 025.d81 / dragon boot (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  390b  |  11 lines
  1. 1 rem  dragon.start
  2. 5 ifx=0thenx=1:load"unpacker",8,1
  3. 6 ifx=1thenx=2:load"dragon.shp",8,1
  4. 10 poke249,224:poke250,204:                 rem screen/color
  5. 20 poke251,0:poke252,64:                    rem shp buffer
  6. 30 poke253,0:poke254,0:                     rem   x-pos,y-pos
  7. 50 sys51456:sys51459:rem  unpack and show normal shp
  8. 55 pg$="dragon dungeon"
  9. 60 print"[147]load pg$,8":print"sys51459:run"
  10. 70 poke631,13:poke632,13:poke198,2:end
  11.